How To Take Screenshot In R